home *** CD-ROM | disk | FTP | other *** search
- #ifndef PRAGMAS_LOWLEVEL_PRAGMAS_H
- #define PRAGMAS_LOWLEVEL_PRAGMAS_H
-
- /*
- ** $VER: lowlevel_pragmas.h 40.1 (17.5.1996)
- ** Includes Release 44.1
- **
- ** Direct ROM interface (pragma) definitions.
- **
- ** Copyright © 1999 Amiga, Inc.
- ** All Rights Reserved
- */
-
- #if defined(LATTICE) || defined(__SASC) || defined(_DCC)
- #ifndef __CLIB_PRAGMA_LIBCALL
- #define __CLIB_PRAGMA_LIBCALL
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #else /* __MAXON__, __STORM__ or AZTEC_C */
- #ifndef __CLIB_PRAGMA_AMICALL
- #define __CLIB_PRAGMA_AMICALL
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* */
-
- #if defined(__SASC) || defined(__STORM__)
- #ifndef __CLIB_PRAGMA_TAGCALL
- #define __CLIB_PRAGMA_TAGCALL
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #endif /* __MAXON__, __STORM__ or AZTEC_C */
-
- #ifndef CLIB_LOWLEVEL_PROTOS_H
- #include <clib/lowlevel_protos.h>
- #endif /* CLIB_LOWLEVEL_PROTOS_H */
-
- /*--- functions in V40 or higher (Release 3.1) ---*/
-
- /* CONTROLLER HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase ReadJoyPort 1e 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x1e, ReadJoyPort(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- /* LANGUAGE HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase GetLanguageSelection 24 00
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x24, GetLanguageSelection())
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- /* KEYBOARD HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase GetKey 30 00
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x30, GetKey())
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase QueryKeys 36 1802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x36, QueryKeys(a0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase AddKBInt 3c 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x3c, AddKBInt(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase RemKBInt 42 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x42, RemKBInt(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- /* SYSTEM HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase SystemControlA 48 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x48, SystemControlA(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall LowLevelBase SystemControl 48 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(LowLevelBase, 0x48, SystemControl(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
-
- /* TIMER HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase AddTimerInt 4e 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x4e, AddTimerInt(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase RemTimerInt 54 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x54, RemTimerInt(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase StopTimerInt 5a 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x5a, StopTimerInt(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase StartTimerInt 60 10903
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x60, StartTimerInt(a1,d0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase ElapsedTime 66 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x66, ElapsedTime(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- /* VBLANK HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase AddVBlankInt 6c 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x6c, AddVBlankInt(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase RemVBlankInt 72 901
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x72, RemVBlankInt(a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- /* MORE CONTROLLER HANDLING */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall LowLevelBase SetJoyPortAttrsA 84 9002
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(LowLevelBase, 0x84, SetJoyPortAttrsA(d0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall LowLevelBase SetJoyPortAttrs 84 9002
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(LowLevelBase, 0x84, SetJoyPortAttrs(d0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
-
- #endif /* PRAGMAS_LOWLEVEL_PRAGMAS_H */
-